home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 1 / Cream of the Crop 1.iso / PROGRAM / BPAS9.ARJ / WHILELUP.PAS < prev    next >
Pascal/Delphi Source File  |  1990-04-29  |  167b  |  12 lines
  1. program Hello;
  2. var
  3.   Count  : integer;
  4. begin
  5.   Count  := 1;
  6.   while Count <= 100 do
  7.   begin
  8.     Writeln(Count);
  9.     Inc(Count)
  10.   end;
  11.   Writeln('End')
  12. end.